home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / gnustuff / tos / othergnu / gnuplot.zoo / atari.diff next >
Encoding:
Text File  |  1992-07-03  |  25.5 KB  |  1,058 lines
  1. diff -crbB gnuplot.org\command.c d:\tc2\gnu\gnuplot\command.c
  2. *** gnuplot.org\command.c    Sat Feb 15 17:12:08 1992
  3. --- d:\tc2\gnu\gnuplot\command.c    Thu Feb 13 00:51:12 1992
  4. ***************
  5. *** 2871,2876 ****
  6. --- 2871,2879 ----
  7.   #ifdef AMIGA_AC_5
  8.   char strg0[256];
  9.   #endif
  10. + #if defined(ATARI)&&defined(__GNUC__)
  11. + #include <osbind.h>
  12. + #endif
  13.   
  14.   do_system()
  15.   {
  16. ***************
  17. *** 2881,2887 ****
  18. --- 2884,2903 ----
  19.      getparms(input_line+1,parms);
  20.      if(fexecv(parms[0],parms) < 0)
  21.   #else
  22. + #if defined(ATARI)&&defined(__GNUC__)
  23. +    /* use preloaded shell, if available */
  24. +    short (*shell_p)(char *command);
  25. +    void *ssp;
  26. + 
  27. +    ssp=(void*)Super(NULL);
  28. +    shell_p=*(short(**)(char*))0x4f6;
  29. +    Super(ssp);
  30. + 
  31. +    /* this is a bit strange, but we have to have a single if */
  32. +    if( (shell_p ? (*shell_p)(input_line+1) : system(input_line+1) ) )
  33. + #else
  34.      if (system(input_line + 1))
  35. + #endif
  36.   #endif
  37.         os_error("system() failed",NO_CARET);
  38.   }
  39. diff -crbB gnuplot.org\demo\simple.dem d:\tc2\gnu\gnuplot\demo\simple.dem
  40. *** gnuplot.org\demo\simple.dem    Tue Feb 11 23:19:22 1992
  41. --- d:\tc2\gnu\gnuplot\demo\simple.dem    Fri Feb 28 13:21:58 1992
  42. ***************
  43. *** 31,37 ****
  44.   plot [-30:20] sin(x*20)*atan(x)
  45.   pause -1 "Hit return to continue"
  46.   
  47. ! plot [-19:19] '1.dat'with impulses ,'2.dat' ,'3.dat' with lines
  48.   pause -1 "Hit return to continue"
  49.   
  50.   # undo what we have done above
  51. --- 31,37 ----
  52.   plot [-30:20] sin(x*20)*atan(x)
  53.   pause -1 "Hit return to continue"
  54.   
  55. ! plot [-19:19] '1.dat' with impulses ,'2.dat' ,'3.dat' with lines
  56.   pause -1 "Hit return to continue"
  57.   
  58.   # undo what we have done above
  59. diff -crbB gnuplot.org\internal.c d:\tc2\gnu\gnuplot\internal.c
  60. *** gnuplot.org\internal.c    Sat Feb 15 17:12:28 1992
  61. --- d:\tc2\gnu\gnuplot\internal.c    Sun Feb 09 17:01:00 1992
  62. ***************
  63. *** 66,77 ****
  64.   #ifdef apollo
  65.   int matherr(struct exception *x)    /* apollo */
  66.   #else /* apollo */
  67. ! #ifdef AMIGA_LC_5_1
  68.   int matherr(x)    /* AMIGA_LC_5_1 */
  69.   struct exception *x;
  70.   #else    /* Most everyone else (not apollo). */
  71.   int matherr()
  72. ! #endif /* AMIGA_LC_5_1 */
  73.   #endif /* apollo */
  74.   #endif /* MSDOS */
  75.   {
  76. --- 66,77 ----
  77.   #ifdef apollo
  78.   int matherr(struct exception *x)    /* apollo */
  79.   #else /* apollo */
  80. ! #if defined(AMIGA_LC_5_1)||defined(ATARI)&&defined(__GNUC__)
  81.   int matherr(x)    /* AMIGA_LC_5_1 */
  82.   struct exception *x;
  83.   #else    /* Most everyone else (not apollo). */
  84.   int matherr()
  85. ! #endif /* AMIGA_LC_5_1 || GCC_ST */
  86.   #endif /* apollo */
  87.   #endif /* MSDOS */
  88.   {
  89. diff -crbB gnuplot.org\plot.c d:\tc2\gnu\gnuplot\plot.c
  90. *** gnuplot.org\plot.c    Sat Feb 15 17:12:36 1992
  91. --- d:\tc2\gnu\gnuplot\plot.c    Sun Mar 08 17:54:16 1992
  92. ***************
  93. *** 57,62 ****
  94. --- 57,66 ----
  95.   #include <graphics.h>
  96.   #endif
  97.   
  98. + #if defined(__GNUC__)&&defined(ATARI)
  99. + #include <osbind.h>
  100. + #endif
  101. + 
  102.   extern char *getenv(),*strcat(),*strcpy(),*strncpy();
  103.   
  104.   extern char input_line[];
  105. ***************
  106. *** 134,165 ****
  107.   #define HOME "sys$login:"
  108.   
  109.   #else /* vms */
  110. ! #ifdef MSDOS
  111.   
  112.   #define HOME "GNUPLOT"
  113.   
  114. ! #else /* MSDOS */
  115. ! 
  116. ! #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  117. ! 
  118. ! #define HOME "GNUPLOT"
  119. ! #else /* AMIGA */
  120.   
  121.   #define HOME "HOME"
  122.   
  123. ! #endif /* AMIGA */
  124. ! #endif /* MSDOS */
  125.   #endif /* vms */
  126.   
  127. ! #ifdef unix
  128. ! #define PLOTRC ".gnuplot"
  129. ! #else /* unix */
  130. ! #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  131.   #define PLOTRC ".gnuplot"
  132. ! #else /* AMIGA */
  133.   #define PLOTRC "gnuplot.ini"
  134. ! #endif /* AMIGA */
  135. ! #endif /* unix */
  136.   
  137.   #ifdef __TURBOC__
  138.   void tc_interrupt()
  139. --- 138,159 ----
  140.   #define HOME "sys$login:"
  141.   
  142.   #else /* vms */
  143. ! #if defined(MSDOS) ||  defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1) || defined(ATARI)
  144.   
  145.   #define HOME "GNUPLOT"
  146.   
  147. ! #else /* MSDOS || AMIGA || ATARI */
  148.   
  149.   #define HOME "HOME"
  150.   
  151. ! #endif /* MSDOS || AMIGA || ATARI */
  152.   #endif /* vms */
  153.   
  154. ! #if defined(unix) || defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  155.   #define PLOTRC ".gnuplot"
  156. ! #else /* AMIGA || unix */
  157.   #define PLOTRC "gnuplot.ini"
  158. ! #endif /* AMIGA || unix */
  159.   
  160.   #ifdef __TURBOC__
  161.   void tc_interrupt()
  162. ***************
  163. *** 297,302 ****
  164. --- 321,330 ----
  165.                   (void) signal(SIGINT, ss_interrupt);
  166.   #endif
  167.   #else /* MSDOS */
  168. + #if defined(__GNUC__)&&defined(ATARI)
  169. +         /* clear keybd buffer - strange GCC bug with signal(SIGINT) */
  170. +                 while( Cconis() ) Cnecin();
  171. + #endif /* GNUC && ATARI */
  172.                   (void) signal(SIGINT, inter);   /* go there on interrupt char */
  173.   #endif /* MSDOS */
  174.   }
  175. ***************
  176. *** 313,320 ****
  177.   #ifdef vms
  178.       (void) strcpy(home,HOME);
  179.   #else /* vms */
  180.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  181. -     strcpy(home,getenv(HOME));
  182.       {
  183.           int h;
  184.           h = strlen(home) - 1;
  185. --- 341,356 ----
  186.   #ifdef vms
  187.       (void) strcpy(home,HOME);
  188.   #else /* vms */
  189. + #if !defined(AMIGA_AC_5)&&!defined(AMIGA_LC_5_1)&&!defined(MSDOS)&&!defined(ATARI)
  190. +     (void) strcat(strcpy(home,getenv(HOME)),"/");
  191. + #else 
  192. +     char *tmp_home=getenv(HOME);
  193. + 
  194. +     if( !tmp_home ) {
  195. +         home[0]='\0';
  196. +     } else {
  197. +         strcpy(home,tmp_home);
  198.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  199.           {
  200.               int h;
  201.               h = strlen(home) - 1;
  202. ***************
  203. *** 326,334 ****
  204.              }
  205.       }
  206.   #else /* AMIGA */
  207. !     (void) strcat(strcpy(home,getenv(HOME)),"/");
  208.   #endif /* AMIGA */
  209.   #endif /* vms */
  210.   #ifdef NOCWDRC
  211.       /* inhibit check of init file in current directory for security reasons */
  212.       {
  213. --- 362,374 ----
  214.               }
  215.           }
  216.   #else /* AMIGA */
  217. !         if( strlen(home) && home[strlen(home)-1]!='\\' )
  218. !             strcat(home,"\\");
  219.   #endif /* AMIGA */
  220. +     }
  221. + #endif /* !AMIGA && !MSDOS && !ATARI */
  222.   #endif /* vms */
  223. + 
  224.   #ifdef NOCWDRC
  225.       /* inhibit check of init file in current directory for security reasons */
  226.       {
  227. diff -crbB gnuplot.org\plot.h d:\tc2\gnu\gnuplot\plot.h
  228. *** gnuplot.org\plot.h    Sat Feb 15 17:12:46 1992
  229. --- d:\tc2\gnu\gnuplot\plot.h    Mon Feb 10 23:07:40 1992
  230. ***************
  231. *** 39,45 ****
  232. --- 39,49 ----
  233.   #if defined(AMIGA_LC_5_1) || defined(AMIGA_AC_5)
  234.   #define SHELL "NewShell"
  235.   #else /* AMIGA */
  236. + #ifdef ATARI
  237. + #define SHELL "gulam.prg"
  238. + #else /* ATARI */
  239.   #define SHELL "/bin/sh"        /* used if SHELL env variable not set */
  240. + #endif /* ATARI */
  241.   #endif /* AMIGA  */
  242.   
  243.   #define SAMPLES 100        /* default number of samples for a plot */
  244. ***************
  245. *** 111,116 ****
  246. --- 115,124 ----
  247.   #endif
  248.   
  249.   
  250. + #ifdef ATARI
  251. + #define OS "TOS "
  252. + #endif
  253. + 
  254.   #ifndef OS
  255.   #define OS ""
  256.   #endif
  257. ***************
  258. *** 260,268 ****
  259. --- 268,278 ----
  260.       LEFT, CENTRE, RIGHT
  261.   };
  262.   
  263. + #if !(defined(ATARI)&&defined(__GNUC__)&&defined(_MATH_H)) /* FF's math.h has the type already */
  264.   struct cmplx {
  265.       double real, imag;
  266.   };
  267. + #endif
  268.   
  269.   
  270.   struct value {
  271. diff -crbB gnuplot.org\readline.c d:\tc2\gnu\gnuplot\readline.c
  272. *** gnuplot.org\readline.c    Sat Feb 15 17:12:54 1992
  273. --- d:\tc2\gnu\gnuplot\readline.c    Sun Feb 09 21:41:44 1992
  274. ***************
  275. *** 69,75 ****
  276.   #endif
  277.   
  278.   
  279. ! #ifndef MSDOS
  280.   
  281.   /* UNIX specific stuff */
  282.   #ifdef TERMIOS
  283. --- 69,75 ----
  284.   #endif
  285.   
  286.   
  287. ! #if !defined(MSDOS)&&!defined(ATARI)
  288.   
  289.   /* UNIX specific stuff */
  290.   #ifdef TERMIOS
  291. ***************
  292. *** 81,95 ****
  293.   #endif /* TERMIOS */
  294.   static int term_set = 0;    /* =1 if rl_termio set */
  295.   
  296. ! #else
  297. ! 
  298.   /* MSDOS specific stuff */
  299.   #define getc(stdin) msdos_getch()
  300.   static char msdos_getch();
  301. ! 
  302.   #endif /* MSDOS */
  303.   
  304. - 
  305.   /* is it <string.h> or <strings.h>?   just declare what we need */
  306.   extern int strlen();
  307.   extern char *strcpy();
  308. --- 81,101 ----
  309.   #endif /* TERMIOS */
  310.   static int term_set = 0;    /* =1 if rl_termio set */
  311.   
  312. ! #else /* !MSDOS && !ATARI */
  313. ! #ifdef MSDOS
  314.   /* MSDOS specific stuff */
  315.   #define getc(stdin) msdos_getch()
  316.   static char msdos_getch();
  317. ! #else /* MSDOS */
  318. ! /* ATARI then */
  319. ! #ifdef getc
  320. ! #undef getc
  321. ! #endif
  322. ! #define getc(f) tos_getch()
  323. ! static char tos_getch();
  324.   #endif /* MSDOS */
  325. + #endif /* !MSDOS && !ATARI */
  326.   
  327.   /* is it <string.h> or <strings.h>?   just declare what we need */
  328.   extern int strlen();
  329.   extern char *strcpy();
  330. ***************
  331. *** 494,504 ****
  332.   
  333.   #endif /* MSDOS */
  334.   
  335.   /* set termio so we can do our own input processing */
  336.   static void
  337.   set_termio()
  338.   {
  339. ! #ifndef MSDOS
  340.       if(term_set == 0) {
  341.   #ifdef TERMIOS
  342.   #ifdef TCGETS
  343. --- 500,561 ----
  344.   
  345.   #endif /* MSDOS */
  346.   
  347. + #ifdef ATARI
  348. + 
  349. + /* Convert Arrow keystrokes to Control characters: TOS version */
  350. + 
  351. + #include <osbind.h>
  352. + 
  353. + static char
  354. + tos_getch()
  355. + {
  356. +     long c=Cnecin();
  357. +     int scan_code=(int)(c>>16); /* get the scancode */
  358. + 
  359. +     scan_code &= 0xff;
  360. + 
  361. +     if( Kbshift(-1)&7 ) scan_code|=0x80; /* Shift or Ctrl */
  362. + 
  363. +     switch(scan_code) {
  364. +     case 0x48: /* Up Arrow */
  365. +         c=0x10; /* ^P */
  366. +         break;
  367. +     case 0x50: /* Down Arrow */
  368. +         c=0x0e; /* ^N */
  369. +         break;
  370. +     case 0x4b: /* Left Arrow */
  371. +         c=0x02; /* ^B */
  372. +         break;
  373. +     case 0x4d: /* Right Arrow */
  374. +         c=0x06; /* ^F */
  375. +         break;
  376. +     case 0xcb: /* Shift Left Arrow */
  377. +     case 0xf3: /* Ctrl Left Arrow (TOS-bug ?) */
  378. +         c=0x01; /* ^A */
  379. +         break;
  380. +     case 0xcd: /* Ctrl Right Arrow */
  381. +     case 0xf4: /* Ctrl Right Arrow (TOS-bug ?) */
  382. +         c=0x05; /* ^E */
  383. +         break;
  384. +     case 0x61: /* Undo - redraw line */
  385. +         c=0x0c; /* ^L */
  386. +         break;
  387. +     }
  388. + 
  389. +     if( (char)c==(char)0x1b ) c=0x15; /* Esc becomes ^U */
  390. + 
  391. +     if( (char)c==(char)0x7f ) c=0x04; /* Del becomes ^D */
  392. + 
  393. +     return (char)c;
  394. + }
  395. + 
  396. + #endif /* ATARI */
  397. + 
  398.   /* set termio so we can do our own input processing */
  399.   static void
  400.   set_termio()
  401.   {
  402. ! #if !defined(MSDOS)&&!defined(ATARI)
  403.       if(term_set == 0) {
  404.   #ifdef TERMIOS
  405.   #ifdef TCGETS
  406. ***************
  407. *** 538,550 ****
  408.   #endif /* TERMIOS */
  409.           term_set = 1;
  410.       }
  411. ! #endif /* MSDOS */
  412.   }
  413.   
  414.   static void
  415.   reset_termio()
  416.   {
  417. ! #ifndef MSDOS
  418.       if(term_set == 1) {
  419.   #ifdef TERMIOS
  420.   #ifdef TCSETSW
  421. --- 595,607 ----
  422.   #endif /* TERMIOS */
  423.           term_set = 1;
  424.       }
  425. ! #endif /* !MSDOS && !ATARI */
  426.   }
  427.   
  428.   static void
  429.   reset_termio()
  430.   {
  431. ! #if !defined(MSDOS)&&!defined(ATARI)
  432.       if(term_set == 1) {
  433.   #ifdef TERMIOS
  434.   #ifdef TCSETSW
  435. ***************
  436. *** 557,562 ****
  437.   #endif /* TERMIOS */
  438.           term_set = 0;
  439.       }
  440. ! #endif /* MSDOS */
  441.   }
  442.   #endif /* READLINE */
  443. --- 614,619 ----
  444.   #endif /* TERMIOS */
  445.           term_set = 0;
  446.       }
  447. ! #endif /* !MSDOS && !ATARI */
  448.   }
  449.   #endif /* READLINE */
  450. diff -crbB gnuplot.org\term\epson.trm d:\tc2\gnu\gnuplot\term\epson.trm
  451. *** gnuplot.org\term\epson.trm    Sat Feb 15 18:17:16 1992
  452. --- d:\tc2\gnu\gnuplot\term\epson.trm    Fri Mar 06 12:37:28 1992
  453. ***************
  454. *** 17,23 ****
  455.    * This file is included by ../term.c.
  456.    *
  457.    * This terminal driver supports:
  458. !  *  epson_lx800, nec_cp6c, nec_cp6d, nec_cp6b, starc,
  459.    *  epson_60dpi, tandy_60dpi
  460.    *
  461.    * AUTHORS
  462. --- 17,23 ----
  463.    * This file is included by ../term.c.
  464.    *
  465.    * This terminal driver supports:
  466. !  *  epson_lx800, nec_cp6, starc,
  467.    *  epson_60dpi, tandy_60dpi
  468.    *
  469.    * AUTHORS
  470. ***************
  471. *** 49,58 ****
  472.   
  473.   EPSONinit()
  474.   {
  475. ! #ifdef PC
  476. !     reopen_binary();
  477. ! #endif
  478. ! #ifdef vms
  479.       reopen_binary();
  480.   #endif
  481.   }
  482. --- 49,55 ----
  483.   
  484.   EPSONinit()
  485.   {
  486. ! #ifdef REOPEN_BINARY
  487.       reopen_binary();
  488.   #endif
  489.   }
  490. ***************
  491. *** 135,190 ****
  492.   static unsigned int neccolor[] = {1,8,4,2,10,12,6,14};
  493.   static unsigned int necpcolor[]= {0,2,1,4};
  494.   
  495. ! NECinit()
  496.   {
  497. ! #ifdef PC
  498. !     reopen_binary();
  499. ! #endif
  500. ! #ifdef vms
  501. !     reopen_binary();
  502. ! #endif
  503.   }
  504.   
  505. ! 
  506. ! /* Monochrome only NEC CP6 printer (set term nec_cp6m or nec_cp6d). */
  507. ! /* will probably work with NEC P6 printer */
  508. ! NECMgraphics()
  509.   {
  510. !     b_charsize(FNT5X9);
  511. !     b_makebitmap((unsigned int)(NECXMAX*xsize),
  512. !                  (unsigned int)(NECYMAX*ysize),1);
  513.   }
  514.   
  515. ! /* Color ribbon in NEC CP6 printer (set term nec_cp6c) */
  516. ! NECCgraphics()
  517.   {
  518.       b_charsize(FNT5X9);
  519.       b_makebitmap((unsigned int)(NECXMAX*xsize),
  520. !                  (unsigned int)(NECYMAX*ysize),4);
  521. ! }
  522. ! 
  523. ! 
  524. ! NECdraft_text()
  525. ! {
  526. !     nec_draft_dump();
  527. !     b_freebitmap();
  528.   }
  529.   
  530.   NECtext()
  531.   {
  532.       nec_dump();
  533.       b_freebitmap();
  534.   }
  535.   
  536. ! NECClinetype(linetype)
  537.   int linetype;
  538.   {
  539.       if (linetype>=6)
  540.           linetype %= 6;
  541.       b_setvalue(neccolor[linetype+2]);
  542.   }
  543.   
  544. - #define NECMlinetype b_setlinetype
  545.   #define NECmove b_move
  546.   #define NECvector b_vector
  547.   #define NECput_text b_put_text
  548. --- 132,203 ----
  549.   static unsigned int neccolor[] = {1,8,4,2,10,12,6,14};
  550.   static unsigned int necpcolor[]= {0,2,1,4};
  551.   
  552. ! static int NECmode;
  553. ! 
  554. ! NECoptions()
  555.   {
  556. !     if( END_OF_COMMAND ) {
  557. !         strcpy(term_options,"monochrome");
  558. !         NECmode='m';
  559. !     } else
  560. !     if( almost_equals(c_token,"m$onochrome") ) {
  561. !         c_token++;
  562. !         strcpy(term_options,"monochrome");
  563. !         NECmode='m';
  564. !     } else
  565. !     if( almost_equals(c_token,"c$olor") ) {
  566. !         c_token++;
  567. !         strcpy(term_options,"color");
  568. !         NECmode='c';
  569. !     } else
  570. !     if( almost_equals(c_token,"d$raft") ) {
  571. !         c_token++;
  572. !         strcpy(term_options,"draft");
  573. !         NECmode='d';
  574. !     } else {
  575. !     /* error, but since the terminal is already set, default to mono */
  576. !         strcpy(term_options,"monochrome");
  577. !         NECmode='m';
  578. !         int_error("modes: color, monochrome, draft",c_token);
  579. !     }
  580.   }
  581.   
  582. ! NECinit()
  583.   {
  584. ! #ifdef REOPEN_BINARY
  585. !     reopen_binary();
  586. ! #endif
  587.   }
  588.   
  589. ! NECgraphics()
  590.   {
  591.       b_charsize(FNT5X9);
  592.       b_makebitmap((unsigned int)(NECXMAX*xsize),
  593. !              (unsigned int)(NECYMAX*ysize),(NECmode=='c' ? 4 : 1));
  594.   }
  595.   
  596.   NECtext()
  597.   {
  598. +     if( NECmode=='d' ) {
  599. +         nec_draft_dump();
  600. +     } else {
  601.           nec_dump();
  602. +     }
  603.       b_freebitmap();
  604.   }
  605.   
  606. ! NEClinetype(linetype)
  607.   int linetype;
  608.   {
  609. +     if( NECmode=='c' ) {
  610.           if (linetype>=6)
  611.               linetype %= 6;
  612.           b_setvalue(neccolor[linetype+2]);
  613. +     } else {
  614. +         b_setlinetype(linetype);
  615. +     }
  616.   }
  617.   
  618.   #define NECmove b_move
  619.   #define NECvector b_vector
  620.   #define NECput_text b_put_text
  621. ***************
  622. *** 325,334 ****
  623.   
  624.   STARCinit()
  625.   {
  626. ! #ifdef PC
  627. !     reopen_binary();
  628. ! #endif
  629. ! #ifdef vms
  630.       reopen_binary();
  631.   #endif
  632.   }
  633. --- 338,344 ----
  634.   
  635.   STARCinit()
  636.   {
  637. ! #ifdef REOPEN_BINARY
  638.       reopen_binary();
  639.   #endif
  640.   }
  641. diff -crbB gnuplot.org\term\hpgl.trm d:\tc2\gnu\gnuplot\term\hpgl.trm
  642. *** gnuplot.org\term\hpgl.trm    Tue Feb 11 23:25:02 1992
  643. --- d:\tc2\gnu\gnuplot\term\hpgl.trm    Thu Mar 05 19:39:42 1992
  644. ***************
  645. *** 48,64 ****
  646.   */
  647.   }
  648.   
  649. ! HPLJIII_PORT_init()
  650. ! {
  651. !       fputs("\033E\033&l1X\033&l0O\033%0B;PW0.15\n",outfile);
  652. ! }
  653.   
  654. ! HPLJIII_LAND_init()
  655.   {
  656. !     fputs("\033E\033&l1X\033&l1O\033%0B;PW0.15\n",outfile);
  657.   }
  658.   
  659. - 
  660.   HPLJIII_graphics()
  661.   {
  662.       fprintf(outfile,
  663. --- 48,82 ----
  664.   */
  665.   }
  666.   
  667. ! static char HPLJIIImode;
  668.   
  669. ! HPLJIII_options()
  670.   {
  671. !     if( END_OF_COMMAND ) {
  672. !         term_options[0]='\0';
  673. !         HPLJIIImode='0';
  674. !     } else
  675. !     if( almost_equals(c_token,"p$ortrait") ) {
  676. !         c_token++;
  677. !         strcpy(term_options,"portrait");
  678. !         HPLJIIImode='0';
  679. !     } else
  680. !     if( almost_equals(c_token,"l$andscape") ) {
  681. !         c_token++;
  682. !         strcpy(term_options,"landscape");
  683. !         HPLJIIImode='1';
  684. !     } else {
  685. !         term_options[0]='\0';
  686. !         HPLJIIImode='0';
  687. !         int_error("portrait or landscape",c_token);
  688. !     }
  689. ! }
  690. ! 
  691. ! HPLJIII_init()
  692. ! {
  693. !     fprintf(outfile,"\033E\033&l1X\033&l%cO\033%0B;PW0.15\n",HPLJIIImode);
  694.   }
  695.   
  696.   HPLJIII_graphics()
  697.   {
  698.       fprintf(outfile,
  699. diff -crbB gnuplot.org\term\hpljii.trm d:\tc2\gnu\gnuplot\term\hpljii.trm
  700. *** gnuplot.org\term\hpljii.trm    Sat Feb 15 18:19:28 1992
  701. --- d:\tc2\gnu\gnuplot\term\hpljii.trm    Fri Mar 06 12:37:52 1992
  702. ***************
  703. *** 78,89 ****
  704.   HPLJIIoptions()
  705.   {
  706.   char opt[4];
  707.   
  708. ! #define HPDJERROR "expecting dots per inch size 75, 100, 150 or 300"
  709. !     if (!END_OF_COMMAND) {
  710. !         if (token[c_token].length>3)
  711. !             int_error(HPDJERROR,c_token);
  712. ! 
  713.           /* almost_equals() won't accept numbers - use strcmp() instead */
  714.           capture(opt,c_token,c_token);
  715.           if (!strcmp(opt,"75")) {
  716. --- 78,91 ----
  717.   HPLJIIoptions()
  718.   {
  719.   char opt[4];
  720. + int parse_error=0;
  721.   
  722. !     if (END_OF_COMMAND) {
  723. !         term_options[0]='\0';
  724. !     } else {
  725. !         if (token[c_token].length>3) {
  726. !             parse_error=1; /* see below */
  727. !         } else {
  728.           /* almost_equals() won't accept numbers - use strcmp() instead */
  729.               capture(opt,c_token,c_token);
  730.               if (!strcmp(opt,"75")) {
  731. ***************
  732. *** 98,107 ****
  733.           else if (!strcmp(opt,"300")) {
  734.                  hplj_dpp = 1;
  735.           } else {
  736. !             int_error(HPDJERROR,c_token);
  737.           }
  738.           c_token++;
  739.       }
  740.   
  741.       term_tbl[term].xmax = HPLJII_XMAX;
  742.       term_tbl[term].ymax = HPLJII_YMAX;
  743. --- 100,111 ----
  744.               else if (!strcmp(opt,"300")) {
  745.                   hplj_dpp = 1;
  746.               } else {
  747. !         /* error, but set dpi anyway, since term it already set */
  748. !                 parse_error=1;
  749.               }
  750.           c_token++;
  751.           }
  752. +     }
  753.   
  754.       term_tbl[term].xmax = HPLJII_XMAX;
  755.       term_tbl[term].ymax = HPLJII_YMAX;
  756. ***************
  757. *** 127,141 ****
  758.               term_tbl[term].h_tic = 5;
  759.               break;
  760.       }
  761.   }
  762.   
  763.   
  764.   HPLJIIinit()
  765.   {
  766. ! #ifdef vms
  767. !    reopen_binary();
  768. ! #endif /* vms */
  769. ! #ifdef PC
  770.      reopen_binary();
  771.   #endif /* PC */
  772.   }
  773. --- 131,146 ----
  774.               term_tbl[term].h_tic = 5;
  775.               break;
  776.       }
  777. + 
  778. +     if( parse_error ) 
  779. +         int_error("expecting dots per inch size 75, 100, 150 or 300",
  780. +                 c_token);
  781.   }
  782.   
  783.   
  784.   HPLJIIinit()
  785.   {
  786. ! #ifdef REOPEN_BINARY
  787.      reopen_binary();
  788.   #endif /* PC */
  789.   }
  790. diff -crbB gnuplot.org\term.c d:\tc2\gnu\gnuplot\term.c
  791. *** gnuplot.org\term.c    Sat Feb 15 17:13:18 1992
  792. --- d:\tc2\gnu\gnuplot\term.c    Fri Mar 06 12:36:28 1992
  793. ***************
  794. *** 43,50 ****
  795. --- 43,55 ----
  796.   /* for use by all drivers */
  797.   #define sign(x) ((x) >= 0 ? 1 : -1)
  798.   #define abs(x) ((x) >= 0 ? (x) : -(x))
  799. + 
  800. + #ifndef max    /* GCC uses inline functions */
  801.   #define max(a,b) ((a) > (b) ? (a) : (b))
  802. + #endif
  803. + #ifndef min
  804.   #define min(a,b) ((a) < (b) ? (a) : (b))
  805. + #endif
  806.   
  807.   BOOLEAN term_init;            /* true if terminal has been initialized */
  808.   
  809. ***************
  810. *** 75,82 ****
  811.   #ifdef __TURBOC__
  812.   char *turboc_init();
  813.   #endif
  814. ! #ifdef PC
  815.   void reopen_binary();
  816.   #endif
  817.   #ifdef vms
  818.   char *vms_init();
  819. --- 80,89 ----
  820.   #ifdef __TURBOC__
  821.   char *turboc_init();
  822.   #endif
  823. ! 
  824. ! #if defined(PC)||defined(ATARI)
  825.   void reopen_binary();
  826. + #define REOPEN_BINARY
  827.   #endif
  828.   #ifdef vms
  829.   char *vms_init();
  830. ***************
  831. *** 87,92 ****
  832. --- 94,100 ----
  833.   void term_nopasthru();
  834.   void reopen_binary();
  835.   void fflush_binary();
  836. + #define REOPEN_BINARY
  837.   #endif
  838.   
  839.   /* This is needed because the unixplot library only writes to stdout. */
  840. ***************
  841. *** 428,433 ****
  842. --- 436,444 ----
  843.   #include "term/amiga.trm"
  844.   #endif
  845.   
  846. + #ifdef ATARI
  847. + #include "term/atari.trm"
  848. + #endif
  849.   
  850.   /* Dummy functions for unavailable features */
  851.   
  852. ***************
  853. *** 492,497 ****
  854. --- 503,517 ----
  855.          AMIGA_justify_text, do_point, do_arrow}
  856.   #endif
  857.   
  858. + #ifdef ATARI
  859. +     ,{"atari", "Atari ST/TT",
  860. +        ATARI_XMAX, ATARI_YMAX, ATARI_VCHAR, ATARI_HCHAR, 
  861. +        ATARI_VTIC, ATARI_HTIC, ATARI_options, ATARI_init, ATARI_reset, 
  862. +        ATARI_text, null_scale, ATARI_graphics, ATARI_move, ATARI_vector, 
  863. +        ATARI_linetype, ATARI_put_text, ATARI_text_angle, 
  864. +        null_justify_text, ATARI_point, do_arrow}
  865. + #endif
  866. + 
  867.   #ifdef DUMB
  868.       ,{"dumb", "printer or glass dumb terminal",
  869.        DUMB_XMAX, DUMB_YMAX, 1, 1,
  870. ***************
  871. *** 812,826 ****
  872.   #endif
  873.   
  874.   #ifdef HPLJIII
  875. !     ,{"pcl5_port", "HP laserjet iii (using HPGL plot vectors), portrait mode",
  876. !     HPGL_XMAX, HPGL_YMAX, HPGL_VCHAR, HPGL_HCHAR,
  877. !     HPGL_VTIC, HPGL_HTIC, options_null, HPLJIII_PORT_init, HPLJIII_reset,
  878. !     HPGL_text, null_scale, HPGL_graphics, HPGL_move, HPGL_vector,
  879. !     HPGL_linetype, HPGL_put_text, HPGL_text_angle,
  880. !     null_justify_text, do_point, do_arrow}
  881. !      ,{"pcl5_land", "HP laserjet iii (using HPGL plot vectors), landscape mode",
  882.       HPGL_XMAX, HPGL_YMAX, HPGL_VCHAR, HPGL_HCHAR,
  883. !     HPGL_VTIC, HPGL_HTIC, options_null, HPLJIII_LAND_init, HPLJIII_reset,
  884.       HPGL_text, null_scale, HPGL_graphics, HPGL_move, HPGL_vector,
  885.       HPGL_linetype, HPGL_put_text, HPGL_text_angle,
  886.       null_justify_text, do_point, do_arrow}
  887. --- 832,840 ----
  888.   #endif
  889.   
  890.   #ifdef HPLJIII
  891. !     ,{"pcl5", "HP laserjet iii (using HPGL plot vectors) [port land]",
  892.       HPGL_XMAX, HPGL_YMAX, HPGL_VCHAR, HPGL_HCHAR,
  893. !     HPGL_VTIC, HPGL_HTIC, HPLJIII_options, HPLJIII_init, HPLJIII_reset,
  894.       HPGL_text, null_scale, HPGL_graphics, HPGL_move, HPGL_vector,
  895.       HPGL_linetype, HPGL_put_text, HPGL_text_angle,
  896.       null_justify_text, do_point, do_arrow}
  897. ***************
  898. *** 878,900 ****
  899.   #endif
  900.   
  901.   #ifdef NEC
  902. !     ,{"nec_cp6m", "NEC printer CP6, Epson LQ-800 Monochrome",
  903. !        NECXMAX, NECYMAX, NECVCHAR, NECHCHAR, 
  904. !        NECVTIC, NECHTIC, options_null, NECinit, NECreset, 
  905. !        NECtext, null_scale, NECMgraphics, NECmove, NECvector, 
  906. !        NECMlinetype, NECput_text, NEC_text_angle, 
  907. !        null_justify_text, line_and_point, do_arrow}
  908. !     ,{"nec_cp6c", "NEC printer CP6 Color",
  909. !        NECXMAX, NECYMAX, NECVCHAR, NECHCHAR, 
  910. !        NECVTIC, NECHTIC, options_null, NECinit, NECreset, 
  911. !        NECtext, null_scale, NECCgraphics, NECmove, NECvector, 
  912. !        NECClinetype, NECput_text, NEC_text_angle, 
  913. !        null_justify_text, do_point, do_arrow}
  914. !     ,{"nec_cp6d", "NEC printer CP6, Epson LQ-800 Draft monochrome",
  915.          NECXMAX, NECYMAX, NECVCHAR, NECHCHAR, 
  916. !        NECVTIC, NECHTIC, options_null, NECinit, NECreset, 
  917. !        NECdraft_text, null_scale, NECMgraphics, NECmove, NECvector, 
  918. !        NECMlinetype, NECput_text, NEC_text_angle, 
  919.          null_justify_text, line_and_point, do_arrow}
  920.   #endif
  921.   
  922. --- 892,902 ----
  923.   #endif
  924.   
  925.   #ifdef NEC
  926. !     ,{"nec_cp6", "NEC printer CP6, Epson LQ-800 [monocrome color draft]",
  927.          NECXMAX, NECYMAX, NECVCHAR, NECHCHAR, 
  928. !        NECVTIC, NECHTIC, NECoptions, NECinit, NECreset, 
  929. !        NECtext, null_scale, NECgraphics, NECmove, NECvector, 
  930. !        NEClinetype, NECput_text, NEC_text_angle, 
  931.          null_justify_text, line_and_point, do_arrow}
  932.   #endif
  933.   
  934. ***************
  935. *** 1198,1203 ****
  936. --- 1200,1209 ----
  937.          term_name = "amiga";
  938.   #endif
  939.   
  940. + #ifdef ATARI
  941. +        term_name = "atari";
  942. + #endif
  943. + 
  944.   #ifdef UNIXPC
  945.          if (iswind() == 0) {
  946.             term_name = "unixpc";
  947. ***************
  948. *** 1446,1453 ****
  949.       (*t->text)();
  950.   }
  951.   
  952. ! 
  953. ! #ifdef PC
  954.   /* output for some terminal types must be binary to stop non Unix computers
  955.      changing \n to \r\n. 
  956.      If the output is not STDOUT, the following code reopens outfile 
  957. --- 1452,1458 ----
  958.       (*t->text)();
  959.   }
  960.   
  961. ! #if defined(PC)||defined(ATARI)
  962.   /* output for some terminal types must be binary to stop non Unix computers
  963.      changing \n to \r\n. 
  964.      If the output is not STDOUT, the following code reopens outfile 
  965. ***************
  966. *** 1473,1479 ****
  967.           }
  968.       }
  969.   }
  970. ! #endif
  971.   
  972.   #ifdef vms
  973.   /* these are needed to modify terminal characteristics */
  974. --- 1478,1484 ----
  975.           }
  976.       }
  977.   }
  978. ! #endif /* PC || ATARI */
  979.   
  980.   #ifdef vms
  981.   /* these are needed to modify terminal characteristics */
  982. diff -crbB gnuplot.org\term.h d:\tc2\gnu\gnuplot\term.h
  983. *** gnuplot.org\term.h    Sat Feb 15 17:13:30 1992
  984. --- d:\tc2\gnu\gnuplot\term.h    Thu Mar 05 15:58:58 1992
  985. ***************
  986. *** 45,51 ****
  987.   
  988.   /* These terminals are not relevant for MSDOS */
  989.   #ifndef MSDOS
  990. ! 
  991.   #ifdef AMIGA_LC_5_1
  992.   #define AMIGASCREEN    /* Amiga custom screen */
  993.   
  994. --- 45,51 ----
  995.   
  996.   /* These terminals are not relevant for MSDOS */
  997.   #ifndef MSDOS
  998. ! #ifndef ATARI
  999.   #ifdef AMIGA_LC_5_1
  1000.   #define AMIGASCREEN     /* Amiga custom screen */
  1001.   
  1002. ***************
  1003. *** 78,91 ****
  1004.   #define HP26        /* HP2623A and maybe others */
  1005.   #define HP75        /* HP7580, and probably other HPs */
  1006.   #define IMAGEN      /* Imagen laser printers (300dpi) (requires -Iterm also) */
  1007. - 
  1008. - #define NEC        /* NEC CP6 pinwriter printer */
  1009.   #define PRESCRIBE    /* Kyocera Laser printer */
  1010.   #define QMS        /* QMS/QUIC laserprinter (Talaris 1200 and others) */
  1011. - #define STARC        /* Star Color Printer */
  1012.   #define TANDY60        /* Tandy DMP-130 series 60-dot per inch graphics */
  1013.   #define V384        /* Vectrix 384 and tandy color printer */
  1014.   
  1015.   #endif /* MSDOS */
  1016.   
  1017.   /* These terminals can be used on any system */
  1018. --- 77,92 ----
  1019.   #define HP26            /* HP2623A and maybe others */
  1020.   #define HP75            /* HP7580, and probably other HPs */
  1021.   #define IMAGEN          /* Imagen laser printers (300dpi) (requires -Iterm also) */
  1022.   #define PRESCRIBE       /* Kyocera Laser printer */
  1023.   #define QMS             /* QMS/QUIC laserprinter (Talaris 1200 and others) */
  1024.   #define TANDY60         /* Tandy DMP-130 series 60-dot per inch graphics */
  1025.   #define V384            /* Vectrix 384 and tandy color printer */
  1026.   
  1027. + #endif /* ATARI */
  1028. + 
  1029. + #define NEC             /* NEC CP6 pinwriter printer */
  1030. + #define STARC           /* Star Color Printer */
  1031. + 
  1032.   #endif /* MSDOS */
  1033.   
  1034.   /* These terminals can be used on any system */
  1035. diff -crbB gnuplot.org\version.c d:\tc2\gnu\gnuplot\version.c
  1036. *** gnuplot.org\version.c    Sat Feb 15 17:13:36 1992
  1037. --- d:\tc2\gnu\gnuplot\version.c    Sat Feb 15 17:53:02 1992
  1038. ***************
  1039. *** 35,42 ****
  1040.    */
  1041.   
  1042.   char version[] = "3.0 ";
  1043. ! char patchlevel[] = "1, Dec 1 91";
  1044. ! char date[] = "Sun Dec 1 16:56:36 1991";
  1045.   
  1046.   /* override in Makefile */
  1047.   #ifndef CONTACT
  1048. --- 35,42 ----
  1049.    */
  1050.   
  1051.   char version[] = "3.0 ";
  1052. ! char patchlevel[] = "1a, Mar 10 92";
  1053. ! char date[] = "Tue Mar 10 22:00:00 1992";
  1054.   
  1055.   /* override in Makefile */
  1056.   #ifndef CONTACT
  1057.  
  1058.